home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / S-Sh / SCB 4.0.cpt / Script Cat Burglar 4.0 / background_10219.txt < prev    next >
Text File  |  1988-03-21  |  5KB  |  214 lines
  1. -- background: 10219 from stack: in.0
  2. -- bmap block id: 7365
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Index Cards
  6. ----- HyperTalk script -----
  7. On openCard
  8.   show menuBar
  9.   Get the number of this card
  10.   Put it - 1 into background field "Index Page"
  11.   Put "Move the new button to an empty pigeonhole, then select the browse tool." into background field "Move Advisor"
  12. end openCard
  13.  
  14.  
  15.  
  16. -- part 15 (button)
  17. -- low flags: 00
  18. -- high flags: 2001
  19. -- rect: left=426 top=25 right=52 bottom=457
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 22165 / 22165
  22. -- text alignment: 1
  23. -- font id: 0
  24. -- text size: 12
  25. -- style flags: 0
  26. -- line height: 16
  27. -- part name: Info card
  28. ----- HyperTalk script -----
  29. on mouseUp
  30.   visual effect iris close
  31.   go to card "Info 1"
  32. end mouseUp
  33.  
  34.  
  35.  
  36. -- part 1 (button)
  37. -- low flags: 00
  38. -- high flags: 2000
  39. -- rect: left=405 top=26 right=51 bottom=424
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 15420 / 15420
  42. -- text alignment: 1
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: To Last of Collection
  48. ----- HyperTalk script -----
  49. on mouseUp
  50.   visual effect iris open
  51.   go to last card of background "Collection Cards"
  52. end mouseUp
  53.  
  54.  
  55.  
  56. -- part 2 (button)
  57. -- low flags: 00
  58. -- high flags: 2000
  59. -- rect: left=455 top=26 right=51 bottom=473
  60. -- title width / last selected line: 0
  61. -- icon id / first selected line: 16560 / 16560
  62. -- text alignment: 1
  63. -- font id: 0
  64. -- text size: 12
  65. -- style flags: 0
  66. -- line height: 16
  67. -- part name: To First of Collection
  68. ----- HyperTalk script -----
  69. on mouseUp
  70.   visual effect iris open
  71.   go to first card of background "Collection Cards"
  72. end mouseUp
  73.  
  74.  
  75.  
  76. -- part 16 (button)
  77. -- low flags: 00
  78. -- high flags: 2000
  79. -- rect: left=94 top=22 right=53 bottom=126
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 24044 / 24044
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: To Get Scripts
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.   hide menuBar
  91.   visual effect dissolve to black
  92.   visual effect scroll up fast
  93.   go to first card of background "Cat in Coalbin"
  94.   hide card field "Info Field" of card "Info 1"
  95.   Hide card field "Mouse Hider" of card "Info 1"
  96.   set scroll of card field "Info Field" of card "Info 1" to 1
  97. end mouseUp
  98.  
  99.  
  100.  
  101. -- part 3 (button)
  102. -- low flags: 00
  103. -- high flags: 2000
  104. -- rect: left=481 top=26 right=51 bottom=506
  105. -- title width / last selected line: 0
  106. -- icon id / first selected line: 21700 / 21700
  107. -- text alignment: 1
  108. -- font id: 0
  109. -- text size: 12
  110. -- style flags: 0
  111. -- line height: 16
  112. -- part name: Home
  113. ----- HyperTalk script -----
  114. on mouseUp
  115.   visual effect iris close
  116.   go Home
  117. end mouseUp
  118.  
  119.  
  120.  
  121. -- part 8 (field)
  122. -- low flags: 00
  123. -- high flags: 0000
  124. -- rect: left=294 top=318 right=335 bottom=317
  125. -- title width / last selected line: 0
  126. -- icon id / first selected line: 0 / 0
  127. -- text alignment: 1
  128. -- font id: 0
  129. -- text size: 12
  130. -- style flags: 0
  131. -- line height: 16
  132. -- part name: Index Page
  133.  
  134.  
  135. -- part 12 (button)
  136. -- low flags: 00
  137. -- high flags: 2000
  138. -- rect: left=162 top=316 right=333 bottom=183
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 15279 / 15279
  141. -- text alignment: 1
  142. -- font id: 0
  143. -- text size: 12
  144. -- style flags: 0
  145. -- line height: 16
  146. -- part name: Previous Index Page
  147. ----- HyperTalk script -----
  148. on mouseUp
  149.   visual effect scroll down
  150.   go to previous card of background "Index Cards"
  151. end mouseUp
  152.  
  153.  
  154.  
  155. -- part 11 (button)
  156. -- low flags: 00
  157. -- high flags: 2000
  158. -- rect: left=330 top=316 right=335 bottom=350
  159. -- title width / last selected line: 0
  160. -- icon id / first selected line: 26020 / 26020
  161. -- text alignment: 1
  162. -- font id: 0
  163. -- text size: 12
  164. -- style flags: 0
  165. -- line height: 16
  166. -- part name: Next Index Page
  167. ----- HyperTalk script -----
  168. on mouseUp
  169.   visual effect scroll up
  170.   go to next card of background "Index Cards"
  171. end mouseUp
  172.  
  173.  
  174.  
  175. -- part 13 (button)
  176. -- low flags: 00
  177. -- high flags: 2000
  178. -- rect: left=36 top=24 right=52 bottom=60
  179. -- title width / last selected line: 0
  180. -- icon id / first selected line: 25002 / 25002
  181. -- text alignment: 1
  182. -- font id: 0
  183. -- text size: 12
  184. -- style flags: 0
  185. -- line height: 16
  186. -- part name: Index help
  187. ----- HyperTalk script -----
  188. on mouseUp
  189.   visual effect dissolve fast
  190.   push Card
  191.   go to card "Help Card 2"
  192. end mouseUp
  193.  
  194.  
  195.  
  196. -- part 10 (field)
  197. -- low flags: 81
  198. -- high flags: 0002
  199. -- rect: left=96 top=309 right=341 bottom=414
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 0 / 0
  202. -- text alignment: 1
  203. -- font id: 0
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: Move Advisor
  208. ----- HyperTalk script -----
  209. On mouseUp
  210.   hide background field "Move Advisor"
  211. end mouseUp
  212.  
  213.  
  214.